home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 April / PCWorld_2007-04_cd.bin / audio-video / kmplayer / kmp.exe / Shader / EdgeSharpen v1_1.txt < prev    next >
Text File  |  2006-09-08  |  2KB  |  69 lines
  1. // EdgeSharpen v1.1=ps_2_0
  2. // http://www.homecinema-fr.com/forum/viewtopic.php?t=29814317 
  3.  
  4. sampler s0 : register(s0); 
  5. float4 p0 : register(c0); 
  6. float4 p1 : register(c1); 
  7.  
  8. #define width (p0[0]) 
  9. #define height (p0[1]) 
  10. #define counter (p0[2]) 
  11. #define clock (p0[3]) 
  12. #define one_over_width (p1[0]) 
  13. #define one_over_height (p1[1]) 
  14.  
  15. #define PI acos(-1) 
  16.  
  17. #define Edge_width      2.0 
  18. #define Edge_threshold       0.2 
  19.  
  20. #define Sharpen_width       1.2 
  21. #define Sharpen_val0       2.0 
  22. #define Sharpen_val1       0.125 
  23.  
  24. float4 main(float2 tex : TEXCOORD0) : COLOR 
  25. { 
  26.    // Read current pixel color 
  27.    float4 Res = tex2D( s0, tex ); 
  28.  
  29.    // Edge detection width vector 
  30.    float dx = Edge_width / height; 
  31.    float dy = Edge_width / width; 
  32.  
  33.    // Read corners color 
  34.    float4 c2 = tex2D(s0, tex + float2( 0,-dy) ); 
  35.    float4 c3 = tex2D(s0, tex + float2(-dx,0) ); 
  36.    float4 c4 = tex2D(s0, tex + float2( dx,0) ); 
  37.    float4 c5 = tex2D(s0, tex + float2( 0, dy) ); 
  38.  
  39.    // Compute vector lenght 
  40.    float4 c0 = Res*4 - c2 - c3 - c4 - c5; 
  41.  
  42.    // If vector lenght > Edge_threshold : sharp this pixel 
  43.    if( length(c0) > Edge_threshold ) 
  44.    { 
  45.       // Compute sharpen's width vector 
  46.       dx = Sharpen_width / width; 
  47.       dy = Sharpen_width / height; 
  48.   
  49.       // Read 8 around pixels color 
  50.       float4 c1 = tex2D(s0, tex + float2(-dx,-dy)) ; 
  51.       c2 = tex2D(s0, tex + float2(0,-dy)) ; 
  52.       c3 = tex2D(s0, tex + float2(-dx,0)) ; 
  53.       c4 = tex2D(s0, tex + float2(dx,0)); 
  54.       c5 = tex2D(s0, tex + float2(0,dy)) ; 
  55.       float4 c6 = tex2D(s0, tex + float2(dx,dy)) ; 
  56.       float4 c7 = tex2D(s0, tex + float2(-dx,+dy)); 
  57.       float4 c8 = tex2D(s0, tex + float2(+dx,-dy)) ; 
  58.  
  59.       float4 c9 =Res * Sharpen_val0; 
  60.  
  61.       Res = c9 - (c1 + c2 + c3 + c4 + c5 + c6 + c7 + c8 ) * Sharpen_val1 ; 
  62.  
  63.       // Uncomment next line to see detected Edges in red ... 
  64.       //Res = float4( 1.0, 0.0, 0.0, 0.0 ); 
  65.  
  66.    } 
  67.  
  68.    return Res; 
  69. }